Public Class clsLugarConvenio
#Region "Propiedades de la Clase"
    Private propCodigo As Integer
    Private propCodigoConvenio As Integer
    Private propCodLugar As Integer
    Private propLugar As String
    Private propPrecioInfantil As Integer
    Private propPrecioAdulto As Integer
    Private propPrecioMayores As Integer
#End Region

    Public Property Codigo() As Integer
        Get
            Return Me.propCodigo
        End Get
        Set(ByVal value As Integer)
            Me.propCodigo = value
        End Set
    End Property

    Public Property CodigoConvenio() As Integer
        Get
            Return Me.propCodigoConvenio
        End Get
        Set(ByVal value As Integer)
            Me.propCodigoConvenio = value
        End Set
    End Property

    Public Property CodigoLugar() As Integer
        Get
            Return Me.propCodLugar
        End Get
        Set(ByVal value As Integer)
            Me.propCodLugar = value
        End Set
    End Property

    Public Property Lugar() As String
        Get
            Return Me.propLugar
        End Get
        Set(ByVal value As String)
            Me.propLugar = value.Trim
        End Set
    End Property

    Public Property PrecioInfantil() As Integer
        Get
            Return Me.propPrecioInfantil
        End Get
        Set(ByVal value As Integer)
            Me.propPrecioInfantil = value
        End Set
    End Property

    Public Property PrecioAdulto() As Integer
        Get
            Return Me.propPrecioAdulto
        End Get
        Set(ByVal value As Integer)
            Me.propPrecioAdulto = value
        End Set
    End Property

    Public Property PrecioMayores() As Integer
        Get
            Return Me.propPrecioMayores
        End Get
        Set(ByVal value As Integer)
            Me.propPrecioMayores = value
        End Set
    End Property

#Region "Funciones y Procedimientos Publicos"
    ''' <summary>
    ''' Destruye el Objeto
    ''' </summary>
    ''' <remarks></remarks>
    Public Sub Dispose()
        Try
            GC.SuppressFinalize(Me)
        Catch ex As Exception
        End Try
    End Sub
#End Region
End Class
